!> LACM : A laterally averaged channel model 
!! based on the 2D Vertical Shallow Water Equations
!! @author Dharhas Pothina
!! @created 20080207
!! @modified 20080421
!! @file lacm_main.f90
program lacm_main
    use lacm_globals
    use lacm_io
    use lacm_transform
	implicit none
! ... local variables ...............	
	integer :: ii !<General Loop Index
	character (len=longtext) :: fname
! add module for defn of globals and constants	
	
! ... read inputs ...................
    fname = "test_mesh.in"
	call read_iodef(fname) 			!defines input/output filenames and locations
	call read_mesh(meshfile) 		!read in mesh and boundary condition?
	call read_params() 				!read in run time parameters
	! Initialize variables
	call xy2riv(mesh,'linear')		!Calculate River coordinates for each node
!	call initialize 			!initialize variables
!	
!	
	
end program lacm_main
